home *** CD-ROM | disk | FTP | other *** search
/ PC User 2003 May / Disc 2 / PCU0503CD2.iso / BitFax_BitWare / BitWarePro / Simply / French / CHEYBBS.SCP < prev    next >
Encoding:
Text File  |  2001-09-05  |  397 b   |  23 lines
  1. //
  2. //      CheyBBS.scp
  3. //
  4. popup
  5.  
  6. declare STRING  %DialNumber;
  7. declare STRING  %WaitString;
  8. declare STRING  %INPUT;
  9. declare long    %t;
  10. :START
  11.     %DialNumber = "131"
  12.     DoComm(%DialNumber)
  13.     %t = -1
  14.     %WaitString = "First name: "
  15.     CWAIT(%WaitString, %t)
  16.     %INPUT = "Hong Wu"
  17.     TYPECR(%INPUT)
  18.     %WaitString = "Password? "
  19.     CWAIT(%WaitString, %t)
  20.     %INPUT = "ccc"
  21.     TYPECR(%INPUT)
  22. exit(0)
  23.